home *** CD-ROM | disk | FTP | other *** search
/ Apple Developer Connection 1998 Fall: Game Toolkit / Disc.iso / SDKs / QuickTime Mac / PInterfaces / Sound.p < prev   
Encoding:
Text File  |  1998-04-09  |  61.3 KB  |  1,467 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        Sound.p
  3.  
  4.      Contains:    Sound Manager Interfaces.
  5.  
  6.      Version:    Technology:    Sound Manager 3.3
  7.                  Release:    QuickTime 3.0
  8.  
  9.      Copyright:    © 1986-1998 by Apple Computer, Inc., all rights reserved
  10.  
  11.      Bugs?:        Please include the the file and version information (from above) with
  12.                  the problem description.  Developers belonging to one of the Apple
  13.                  developer programs can submit bug reports to:
  14.  
  15.                      devsupport@apple.com
  16.  
  17. }
  18. {$IFC UNDEFINED UsingIncludes}
  19. {$SETC UsingIncludes := 0}
  20. {$ENDC}
  21.  
  22. {$IFC NOT UsingIncludes}
  23.  UNIT Sound;
  24.  INTERFACE
  25. {$ENDC}
  26.  
  27. {$IFC UNDEFINED __SOUND__}
  28. {$SETC __SOUND__ := 1}
  29.  
  30. {$I+}
  31. {$SETC SoundIncludes := UsingIncludes}
  32. {$SETC UsingIncludes := 1}
  33.  
  34. {$IFC UNDEFINED __MACTYPES__}
  35. {$I MacTypes.p}
  36. {$ENDC}
  37. {$IFC UNDEFINED __DIALOGS__}
  38. {$I Dialogs.p}
  39. {$ENDC}
  40. {$IFC UNDEFINED __COMPONENTS__}
  41. {$I Components.p}
  42. {$ENDC}
  43. {$IFC UNDEFINED __MIXEDMODE__}
  44. {$I MixedMode.p}
  45. {$ENDC}
  46. {$IFC UNDEFINED __MOVIES__}
  47. {$I Movies.p}
  48. {$ENDC}
  49.  
  50.  
  51. {$PUSH}
  52. {$ALIGN MAC68K}
  53. {$LibExport+}
  54.  
  55. {
  56.                         * * *  N O T E  * * *
  57.  
  58.     This file has been updated to include Sound Manager 3.3 interfaces.
  59.  
  60.     Some of the Sound Manager 3.0 interfaces were not put into the InterfaceLib
  61.     that originally shipped with the PowerMacs. These missing functions and the
  62.     new 3.3 interfaces have been released in the SoundLib library for PowerPC
  63.     developers to link with. The runtime library for these functions are
  64.     installed by the Sound Manager. The following functions are found in SoundLib.
  65.  
  66.         GetCompressionInfo(), GetSoundPreference(), SetSoundPreference(),
  67.         UnsignedFixedMulDiv(), SndGetInfo(), SndSetInfo(), GetSoundOutputInfo(),
  68.         SetSoundOutputInfo(), GetCompressionName(), SoundConverterOpen(),
  69.         SoundConverterClose(), SoundConverterGetBufferSizes(), SoundConverterBeginConversion(),
  70.         SoundConverterConvertBuffer(), SoundConverterEndConversion(),
  71.         AudioGetBass(), AudioGetInfo(), AudioGetMute(), AudioGetOutputDevice(),
  72.         AudioGetTreble(), AudioGetVolume(), AudioMuteOnEvent(), AudioSetBass(),
  73.         AudioSetMute(), AudioSetToDefaults(), AudioSetTreble(), AudioSetVolume(),
  74.         OpenMixerSoundComponent(), CloseMixerSoundComponent(), SoundComponentAddSource(),
  75.         SoundComponentGetInfo(), SoundComponentGetSource(), SoundComponentGetSourceData(),
  76.         SoundComponentInitOutputDevice(), SoundComponentPauseSource(),
  77.         SoundComponentPlaySourceBuffer(), SoundComponentRemoveSource(),
  78.         SoundComponentSetInfo(), SoundComponentSetOutput(), SoundComponentSetSource(),
  79.         SoundComponentStartSource(), SoundComponentStopSource(),
  80.         ParseAIFFHeader(), ParseSndHeader(), SoundConverterGetInfo(), SoundConverterSetInfo()
  81. }
  82. {
  83.     Interfaces for Sound Driver, !!! OBSOLETE and NOT SUPPORTED !!!
  84.  
  85.     These items are no longer defined, but appear here so that someone
  86.     searching the interfaces might find them. If you are using one of these
  87.     items, you must change your code to support the Sound Manager.
  88.  
  89.         swMode, ftMode, ffMode
  90.         FreeWave, FFSynthRec, Tone, SWSynthRec, Wave, FTSoundRec
  91.         SndCompletionProcPtr
  92.         StartSound, StopSound, SoundDone
  93. }
  94. {
  95.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  96.    constants
  97.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  98. }
  99. CONST twelfthRootTwo = 1.05946309435;
  100.  
  101.  
  102. CONST
  103.     soundListRsrc                = 'snd ';                        { Resource type used by Sound Manager }
  104.  
  105.     kSimpleBeepID                = 1;                            { reserved resource ID for Simple Beep }
  106.  
  107.     rate48khz                    = $BB800000;                    { 48000.00000 in fixed-point }
  108.     rate44khz                    = $AC440000;                    { 44100.00000 in fixed-point }
  109.     rate22050hz                    = $56220000;                    { 22050.00000 in fixed-point }
  110.     rate22khz                    = $56EE8BA3;                    { 22254.54545 in fixed-point }
  111.     rate11khz                    = $2B7745D1;                    { 11127.27273 in fixed-point }
  112.     rate11025hz                    = $2B110000;                    { 11025.00000 in fixed-point }
  113.  
  114.                                                                 { synthesizer numbers for SndNewChannel }
  115.     squareWaveSynth                = 1;                            { square wave synthesizer }
  116.     waveTableSynth                = 3;                            { wave table synthesizer }
  117.     sampledSynth                = 5;                            { sampled sound synthesizer }
  118.                                                                 { old Sound Manager MACE synthesizer numbers }
  119.     MACE3snthID                    = 11;
  120.     MACE6snthID                    = 13;
  121.  
  122.     kMiddleC                    = 60;                            { MIDI note value for middle C }
  123.  
  124.     kNoVolume                    = 0;                            { setting for no sound volume }
  125.     kFullVolume                    = $0100;                        { 1.0, setting for full hardware output volume }
  126.  
  127.     stdQLength                    = 128;
  128.  
  129.     dataOffsetFlag                = $8000;
  130.  
  131.     kUseOptionalOutputDevice    = -1;                            { only for Sound Manager 3.0 or later }
  132.  
  133.     notCompressed                = 0;                            { compression ID's }
  134.     fixedCompression            = -1;                            { compression ID for fixed-sized compression }
  135.     variableCompression            = -2;                            { compression ID for variable-sized compression }
  136.  
  137.     twoToOne                    = 1;
  138.     eightToThree                = 2;
  139.     threeToOne                    = 3;
  140.     sixToOne                    = 4;
  141.     sixToOnePacketSize            = 8;
  142.     threeToOnePacketSize        = 16;
  143.  
  144.     stateBlockSize                = 64;
  145.     leftOverBlockSize            = 32;
  146.  
  147.     firstSoundFormat            = $0001;                        { general sound format }
  148.     secondSoundFormat            = $0002;                        { special sampled sound format (HyperCard) }
  149.  
  150.     dbBufferReady                = $00000001;                    { double buffer is filled }
  151.     dbLastBuffer                = $00000004;                    { last double buffer to play }
  152.  
  153.     sysBeepDisable                = $0000;                        { SysBeep() enable flags }
  154.     sysBeepEnable                = $01;
  155.     sysBeepSynchronous            = $02;                            { if bit set, make alert sounds synchronous }
  156.  
  157.     unitTypeNoSelection            = $FFFF;                        { unitTypes for AudioSelection.unitType }
  158.     unitTypeSeconds                = $0000;
  159.  
  160.     stdSH                        = $00;                            { Standard sound header encode value }
  161.     extSH                        = $FF;                            { Extended sound header encode value }
  162.     cmpSH                        = $FE;                            { Compressed sound header encode value }
  163.  
  164. {command numbers for SndDoCommand and SndDoImmediate}
  165.     nullCmd                        = 0;
  166.     initCmd                        = 1;
  167.     freeCmd                        = 2;
  168.     quietCmd                    = 3;
  169.     flushCmd                    = 4;
  170.     reInitCmd                    = 5;
  171.     waitCmd                        = 10;
  172.     pauseCmd                    = 11;
  173.     resumeCmd                    = 12;
  174.     callBackCmd                    = 13;
  175.     syncCmd                        = 14;
  176.     availableCmd                = 24;
  177.     versionCmd                    = 25;
  178.     totalLoadCmd                = 26;
  179.     loadCmd                        = 27;
  180.     freqDurationCmd                = 40;
  181.     restCmd                        = 41;
  182.     freqCmd                        = 42;
  183.     ampCmd                        = 43;
  184.     timbreCmd                    = 44;
  185.     getAmpCmd                    = 45;
  186.     volumeCmd                    = 46;                            { sound manager 3.0 or later only }
  187.     getVolumeCmd                = 47;                            { sound manager 3.0 or later only }
  188.     clockComponentCmd            = 50;                            { sound manager 3.2.1 or later only }
  189.     getClockComponentCmd        = 51;                            { sound manager 3.2.1 or later only }
  190.     scheduledSoundCmd            = 52;                            { sound manager 3.3 or later only }
  191.     linkSoundComponentsCmd        = 53;                            { sound manager 3.3 or later only }
  192.     waveTableCmd                = 60;
  193.     phaseCmd                    = 61;
  194.     soundCmd                    = 80;
  195.     bufferCmd                    = 81;
  196.     rateCmd                        = 82;
  197.     continueCmd                    = 83;
  198.     doubleBufferCmd                = 84;
  199.     getRateCmd                    = 85;
  200.     rateMultiplierCmd            = 86;
  201.     getRateMultiplierCmd        = 87;
  202.     sizeCmd                        = 90;                            { obsolete command }
  203.     convertCmd                    = 91;                            { obsolete MACE command }
  204.  
  205. {$IFC OLDROUTINENAMES }
  206. {channel initialization parameters}
  207.     waveInitChannelMask            = $07;
  208.     waveInitChannel0            = $04;                            { wave table only, Sound Manager 2.0 and earlier }
  209.     waveInitChannel1            = $05;                            { wave table only, Sound Manager 2.0 and earlier }
  210.     waveInitChannel2            = $06;                            { wave table only, Sound Manager 2.0 and earlier }
  211.     waveInitChannel3            = $07;                            { wave table only, Sound Manager 2.0 and earlier }
  212.     initChan0                    = $04;                            { obsolete spelling }
  213.     initChan1                    = $05;                            { obsolete spelling }
  214.     initChan2                    = $06;                            { obsolete spelling }
  215.     initChan3                    = $07;                            { obsolete spelling }
  216.  
  217.     outsideCmpSH                = 0;                            { obsolete MACE constant }
  218.     insideCmpSH                    = 1;                            { obsolete MACE constant }
  219.     aceSuccess                    = 0;                            { obsolete MACE constant }
  220.     aceMemFull                    = 1;                            { obsolete MACE constant }
  221.     aceNilBlock                    = 2;                            { obsolete MACE constant }
  222.     aceBadComp                    = 3;                            { obsolete MACE constant }
  223.     aceBadEncode                = 4;                            { obsolete MACE constant }
  224.     aceBadDest                    = 5;                            { obsolete MACE constant }
  225.     aceBadCmd                    = 6;                            { obsolete MACE constant }
  226.  
  227. {$ENDC}  {OLDROUTINENAMES}
  228.  
  229.     initChanLeft                = $0002;                        { left stereo channel }
  230.     initChanRight                = $0003;                        { right stereo channel }
  231.     initNoInterp                = $0004;                        { no linear interpolation }
  232.     initNoDrop                    = $0008;                        { no drop-sample conversion }
  233.     initMono                    = $0080;                        { monophonic channel }
  234.     initStereo                    = $00C0;                        { stereo channel }
  235.     initMACE3                    = $0300;                        { MACE 3:1 }
  236.     initMACE6                    = $0400;                        { MACE 6:1 }
  237.     initPanMask                    = $0003;                        { mask for right/left pan values }
  238.     initSRateMask                = $0030;                        { mask for sample rate values }
  239.     initStereoMask                = $00C0;                        { mask for mono/stereo values }
  240.     initCompMask                = $FF00;                        { mask for compression IDs }
  241.  
  242. {Get&Set Sound Information Selectors}
  243.     siActiveChannels            = 'chac';                        { active channels }
  244.     siActiveLevels                = 'lmac';                        { active meter levels }
  245.     siAGCOnOff                    = 'agc ';                        { automatic gain control state }
  246.     siAsync                        = 'asyn';                        { asynchronous capability }
  247.     siAVDisplayBehavior            = 'avdb';
  248.     siChannelAvailable            = 'chav';                        { number of channels available }
  249.     siCompressionAvailable        = 'cmav';                        { compression types available }
  250.     siCompressionChannels        = 'cpct';                        { compressor's number of channels }
  251.     siCompressionFactor            = 'cmfa';                        { current compression factor }
  252.     siCompressionHeader            = 'cmhd';                        { return compression header }
  253.     siCompressionNames            = 'cnam';                        { compression type names available }
  254.     siCompressionParams            = 'evaw';                        { compression parameters }
  255.     siCompressionSampleRate        = 'cprt';                        { compressor's sample rate }
  256.     siCompressionType            = 'comp';                        { current compression type }
  257.     siContinuous                = 'cont';                        { continous recording }
  258.     siDecompressionParams        = 'wave';                        { decompression parameters }
  259.     siDeviceBufferInfo            = 'dbin';                        { size of interrupt buffer }
  260.     siDeviceConnected            = 'dcon';                        { input device connection status }
  261.     siDeviceIcon                = 'icon';                        { input device icon }
  262.     siDeviceName                = 'name';                        { input device name }
  263.     siHardwareBalance            = 'hbal';
  264.     siHardwareBalanceSteps        = 'hbls';
  265.     siHardwareBass                = 'hbas';
  266.     siHardwareBassSteps            = 'hbst';
  267.     siHardwareBusy                = 'hwbs';                        { sound hardware is in use }
  268.     siHardwareFormat            = 'hwfm';                        { get hardware format }
  269.     siHardwareMute                = 'hmut';                        { mute state of all hardware }
  270.     siHardwareTreble            = 'htrb';
  271.     siHardwareTrebleSteps        = 'hwts';
  272.     siHardwareVolume            = 'hvol';                        { volume level of all hardware }
  273.     siHardwareVolumeSteps        = 'hstp';                        { number of volume steps for hardware }
  274.     siHeadphoneMute                = 'pmut';                        { mute state of headphones }
  275.     siHeadphoneVolume            = 'pvol';                        { volume level of headphones }
  276.     siHeadphoneVolumeSteps        = 'hdst';                        { number of volume steps for headphones }
  277.     siInputAvailable            = 'inav';                        { input sources available }
  278.     siInputGain                    = 'gain';                        { input gain }
  279.     siInputSource                = 'sour';                        { input source selector }
  280.     siInputSourceNames            = 'snam';                        { input source names }
  281.     siLevelMeterOnOff            = 'lmet';                        { level meter state }
  282.     siModemGain                    = 'mgai';                        { modem input gain }
  283.     siMonitorAvailable            = 'mnav';
  284.     siMonitorSource                = 'mons';
  285.     siNumberChannels            = 'chan';                        { current number of channels }
  286.     siOptionsDialog                = 'optd';                        { display options dialog }
  287.     siOSTypeInputSource            = 'inpt';                        { input source by OSType }
  288.     siOSTypeInputAvailable        = 'inav';                        { list of available input source OSTypes }
  289.     siPlayThruOnOff                = 'plth';                        { playthrough state }
  290.     siPostMixerSoundComponent    = 'psmx';                        { install post-mixer effect }
  291.     siPreMixerSoundComponent    = 'prmx';                        { install pre-mixer effect }
  292.     siQuality                    = 'qual';                        { quality setting }
  293.     siRateMultiplier            = 'rmul';                        { throttle rate setting }
  294.     siRecordingQuality            = 'qual';                        { recording quality }
  295.     siSampleRate                = 'srat';                        { current sample rate }
  296.     siSampleRateAvailable        = 'srav';                        { sample rates available }
  297.     siSampleSize                = 'ssiz';                        { current sample size }
  298.     siSampleSizeAvailable        = 'ssav';                        { sample sizes available }
  299.     siSetupCDAudio                = 'sucd';                        { setup sound hardware for CD audio }
  300.     siSetupModemAudio            = 'sumd';                        { setup sound hardware for modem audio }
  301.     siSlopeAndIntercept            = 'flap';                        { floating point variables for conversion }
  302.     siSoundClock                = 'sclk';
  303.     siUseThisSoundClock            = 'sclc';                        { sdev uses this to tell the mixer to use his sound clock }
  304.     siSpeakerMute                = 'smut';                        { mute state of all built-in speaker }
  305.     siSpeakerVolume                = 'svol';                        { volume level of built-in speaker }
  306.     siSSpCPULoadLimit            = '3dll';
  307.     siSSpLocalization            = '3dif';
  308.     siSSpSpeakerSetup            = '3dst';
  309.     siStereoInputGain            = 'sgai';                        { stereo input gain }
  310.     siSubwooferMute                = 'bmut';                        { mute state of sub-woofer }
  311.     siTwosComplementOnOff        = 'twos';                        { two's complement state }
  312.     siVolume                    = 'volu';                        { volume level of source }
  313.     siVoxRecordInfo                = 'voxr';                        { VOX record parameters }
  314.     siVoxStopInfo                = 'voxs';                        { VOX stop parameters }
  315.     siWideStereo                = 'wide';                        { wide stereo setting }
  316.  
  317.     siCloseDriver                = 'clos';                        { reserved for internal use only }
  318.     siInitializeDriver            = 'init';                        { reserved for internal use only }
  319.     siPauseRecording            = 'paus';                        { reserved for internal use only }
  320.     siUserInterruptProc            = 'user';                        { reserved for internal use only }
  321.  
  322. {  input source Types }
  323.     kInvalidSource                = $FFFFFFFF;                    { this source may be returned from GetInfo if no other source is the monitored source }
  324.     kNoSource                    = 'none';                        { no source selection }
  325.     kCDSource                    = 'cd  ';                        { internal CD player input }
  326.     kExtMicSource                = 'emic';                        { external mic input }
  327.     kRCAInSource                = 'irca';                        { RCA jack input }
  328.     kTVFMTunerSource            = 'tvfm';
  329.     kDAVInSource                = 'idav';                        { DAV analog input }
  330.     kIntMicSource                = 'imic';                        { internal mic input }
  331.     kMediaBaySource                = 'mbay';                        { media bay input }
  332.     kModemSource                = 'modm';                        { modem input (internal modem on desktops, PCI input on PowerBooks) }
  333.     kPCCardSource                = 'pcm ';                        { PC Card pwm input }
  334.     kZoomVideoSource            = 'zvpc';                        { zoom video input }
  335.     kDVDSource                    = 'dvda';                        { DVD audio input }
  336.  
  337. { Sound Component Types and Subtypes }
  338.     kNoSoundComponentType        = '****';
  339.     kSoundComponentType            = 'sift';                        { component type }
  340.     kSoundComponentPPCType        = 'nift';                        { component type for PowerPC code }
  341.     kRate8SubType                = 'ratb';                        { 8-bit rate converter }
  342.     kRate16SubType                = 'ratw';                        { 16-bit rate converter }
  343.     kConverterSubType            = 'conv';                        { sample format converter }
  344.     kSndSourceSubType            = 'sour';                        { generic source component }
  345.     kMixerType                    = 'mixr';
  346.     kMixer8SubType                = 'mixb';                        { 8-bit mixer }
  347.     kMixer16SubType                = 'mixw';                        { 16-bit mixer }
  348.     kSoundInputDeviceType        = 'sinp';                        { sound input component }
  349.     kWaveInSubType                = 'wavi';                        { Windows Wave }
  350.     kSoundOutputDeviceType        = 'sdev';                        { sound output component }
  351.     kClassicSubType                = 'clas';                        { classic hardware, i.e. Mac Plus }
  352.     kASCSubType                    = 'asc ';                        { Apple Sound Chip device }
  353.     kDSPSubType                    = 'dsp ';                        { DSP device }
  354.     kAwacsSubType                = 'awac';                        { Another of Will's Audio Chips device }
  355.     kGCAwacsSubType                = 'awgc';                        { Awacs audio with Grand Central DMA }
  356.     kSingerSubType                = 'sing';                        { Singer (via Whitney) based sound }
  357.     kSinger2SubType                = 'sng2';                        { Singer 2 (via Whitney) for Acme }
  358.     kWhitSubType                = 'whit';                        { Whit sound component for PrimeTime 3 }
  359.     kSoundBlasterSubType        = 'sbls';                        { Sound Blaster for CHRP }
  360.     kWaveOutSubType                = 'wavo';                        { Windows Wave }
  361.     kDirectSoundSubType            = 'dsnd';                        { Direct Sound }
  362.     kUNIXsdevSubType            = 'un1x';                        { UNIX base sdev }
  363.     kSoundCompressor            = 'scom';
  364.     kSoundDecompressor            = 'sdec';
  365.     kAudioComponentType            = 'adio';                        { Audio components and sub-types }
  366.     kAwacsPhoneSubType            = 'hphn';
  367.     kAudioVisionSpeakerSubType    = 'telc';
  368.     kAudioVisionHeadphoneSubType = 'telh';
  369.     kPhilipsFaderSubType        = 'tvav';
  370.     kSGSToneSubType                = 'sgs0';
  371.     kSoundEffectsType            = 'snfx';                        { sound effects type }
  372.     kSSpLocalizationSubType        = 'snd3';
  373.     kSoundPortHandlerType        = 'soph';                        { sound output port handler component }
  374.     kAwacsGCSubType                = 'awgc';                        { awacs GC port handler }
  375.     kSoundOutPortType            = 'sopt';                        { sound output port component }
  376.     kIntSpkrSubType                = 'ispk';                        { internal speaker }
  377.     kHeadphonesSubType            = 'hdpn';                        { headphones }
  378.     kExtSpkrSubType                = 'espk';                        { external speaker }
  379.     kEffectSubType                = 'efct';                        { effect (like SRS or some other DSP function) }
  380.     kSubwooferSubType            = 'subw';                        { subwoofer }
  381.     kSoundPowerType                = 'spwr';                        { sound power component }
  382.     kPowerAwacsSubType            = 'awac';                        { awacs power }
  383.     kPowerScreamerSubType        = 'scrm';                        { screamer power }
  384.  
  385. { Format Types }
  386.     kSoundNotCompressed            = 'NONE';                        { sound is not compressed }
  387.     k8BitOffsetBinaryFormat        = 'raw ';                        { 8-bit offset binary }
  388.     k16BitBigEndianFormat        = 'twos';                        { 16-bit big endian }
  389.     k16BitLittleEndianFormat    = 'sowt';                        { 16-bit little endian }
  390.     kFloat32Format                = 'fl32';                        { 32-bit floating point }
  391.     kFloat64Format                = 'fl64';                        { 64-bit floating point }
  392.     k24BitFormat                = 'in24';                        { 24-bit integer }
  393.     k32BitFormat                = 'in32';                        { 32-bit integer }
  394.     kMACE3Compression            = 'MAC3';                        { MACE 3:1 }
  395.     kMACE6Compression            = 'MAC6';                        { MACE 6:1 }
  396.     kCDXA4Compression            = 'cdx4';                        { CD/XA 4:1 }
  397.     kCDXA2Compression            = 'cdx2';                        { CD/XA 2:1 }
  398.     kIMACompression                = 'ima4';                        { IMA 4:1 }
  399.     kULawCompression            = 'ulaw';                        { µLaw 2:1 }
  400.     kALawCompression            = 'alaw';                        { aLaw 2:1 }
  401.     kMicrosoftADPCMFormat        = $6D730002;                    { Microsoft ADPCM - ACM code 2 }
  402.     kDVIIntelIMAFormat            = $6D730011;                    { DVI/Intel IMA ADPCM - ACM code 17 }
  403.     kDVAudioFormat                = 'dvca';                        { DV Audio }
  404.     kQDesignCompression            = 'QDMC';                        { QDesign music }
  405.     kQUALCOMMCompression        = 'Qclp';                        { QUALCOMM PureVoice }
  406.     kOffsetBinary                = 'raw ';                        { for compatibility }
  407.     kTwosComplement                = 'twos';                        { for compatibility }
  408.     kLittleEndianFormat            = 'sowt';                        { for compatibility }
  409.  
  410. {$IFC TARGET_RT_LITTLE_ENDIAN }
  411.     k16BitNativeEndianFormat    = 'sowt';
  412.     k16BitNonNativeEndianFormat    = 'twos';
  413.  
  414. {$ELSEC}
  415.     k16BitNativeEndianFormat    = 'twos';
  416.     k16BitNonNativeEndianFormat    = 'sowt';
  417.  
  418. {$ENDC}  {TARGET_RT_LITTLE_ENDIAN}
  419.  
  420. { Features Flags }
  421.     k8BitRawIn                    = $01;                            { data description }
  422.     k8BitTwosIn                    = $02;
  423.     k16BitIn                    = $04;
  424.     kStereoIn                    = $08;
  425.     k8BitRawOut                    = $0100;
  426.     k8BitTwosOut                = $0200;
  427.     k16BitOut                    = $0400;
  428.     kStereoOut                    = $0800;
  429.     kReverse                    = $00010000;                    {   function description }
  430.     kRateConvert                = $00020000;
  431.     kCreateSoundSource            = $00040000;
  432.     kHighQuality                = $00400000;                    {   performance description }
  433.     kNonRealTime                = $00800000;
  434.  
  435. { SoundComponentPlaySourceBuffer action flags }
  436.     kSourcePaused                = $01;
  437.     kPassThrough                = $00010000;
  438.     kNoSoundComponentChain        = $00020000;
  439.  
  440. { SoundParamBlock flags, usefull for OpenMixerSoundComponent }
  441.     kNoMixing                    = $01;                            { don't mix source }
  442.     kNoSampleRateConversion        = $02;                            { don't convert sample rate (i.e. 11 kHz -> 22 kHz) }
  443.     kNoSampleSizeConversion        = $04;                            { don't convert sample size (i.e. 16 -> 8) }
  444.     kNoSampleFormatConversion    = $08;                            { don't convert sample format (i.e. 'twos' -> 'raw ') }
  445.     kNoChannelConversion        = $10;                            { don't convert stereo/mono }
  446.     kNoDecompression            = $20;                            { don't decompress (i.e. 'MAC3' -> 'raw ') }
  447.     kNoVolumeConversion            = $40;                            { don't apply volume }
  448.     kNoRealtimeProcessing        = $80;                            { won't run at interrupt time }
  449.     kScheduledSource            = $0100;                        { source is scheduled }
  450.  
  451. { SoundParamBlock quality settings }
  452.     kBestQuality                = $01;                            { use interpolation in rate conversion }
  453.  
  454. { useful bit masks }
  455.     kInputMask                    = $000000FF;                    { masks off input bits }
  456.     kOutputMask                    = $0000FF00;                    { masks off output bits }
  457.     kOutputShift                = 8;                            { amount output bits are shifted }
  458.     kActionMask                    = $00FF0000;                    { masks off action bits }
  459.     kSoundComponentBits            = $00FFFFFF;
  460.  
  461. { audio atom types }
  462.     kAudioFormatAtomType        = 'frma';
  463.     kAudioEndianAtomType        = 'enda';
  464.     kAudioTerminatorAtomType    = 0;
  465.  
  466. { siAVDisplayBehavior types }
  467.     kAVDisplayHeadphoneRemove    = 0;                            {  monitor does not have a headphone attached }
  468.     kAVDisplayHeadphoneInsert    = 1;                            {  monitor has a headphone attached }
  469.     kAVDisplayPlainTalkRemove    = 2;                            {  monitor either sending no input through CPU input port or unable to tell if input is coming in }
  470.     kAVDisplayPlainTalkInsert    = 3;                            {  monitor sending PlainTalk level microphone source input through sound input port }
  471.  
  472. { Audio Component constants }
  473.                                                                 { Values for whichChannel parameter }
  474.     audioAllChannels            = 0;                            { All channels (usually interpreted as both left and right) }
  475.     audioLeftChannel            = 1;                            { Left channel }
  476.     audioRightChannel            = 2;                            { Right channel }
  477.                                                                 { Values for mute parameter }
  478.     audioUnmuted                = 0;                            { Device is unmuted }
  479.     audioMuted                    = 1;                            { Device is muted }
  480.                                                                 { Capabilities flags definitions }
  481.     audioDoesMono                = $00000001;                    { Device supports mono output }
  482.     audioDoesStereo                = $00000002;                    { Device supports stereo output }
  483.     audioDoesIndependentChannels = $00000004;                    { Device supports independent software control of each channel }
  484.  
  485. {Sound Input Qualities}
  486.     siCDQuality                    = 'cd  ';                        { 44.1kHz, stereo, 16 bit }
  487.     siBestQuality                = 'best';                        { 22kHz, mono, 8 bit }
  488.     siBetterQuality                = 'betr';                        { 22kHz, mono, MACE 3:1 }
  489.     siGoodQuality                = 'good';                        { 22kHz, mono, MACE 6:1 }
  490.     siNoneQuality                = 'none';                        { settings don't match any quality for a get call }
  491.  
  492.     siDeviceIsConnected            = 1;                            { input device is connected and ready for input }
  493.     siDeviceNotConnected        = 0;                            { input device is not connected }
  494.     siDontKnowIfConnected        = -1;                            { can't tell if input device is connected }
  495.     siReadPermission            = 0;                            { permission passed to SPBOpenDevice }
  496.     siWritePermission            = 1;                            { permission passed to SPBOpenDevice }
  497.  
  498. {
  499.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  500.    typedefs
  501.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  502. }
  503.  
  504.  
  505. TYPE
  506.     SndCommandPtr = ^SndCommand;
  507.     SndCommand = PACKED RECORD
  508.         cmd:                    UInt16;
  509.         param1:                    INTEGER;
  510.         param2:                    LONGINT;
  511.     END;
  512.  
  513.     SndChannelPtr = ^SndChannel;
  514. {$IFC TYPED_FUNCTION_POINTERS}
  515.     SndCallBackProcPtr = PROCEDURE(chan: SndChannelPtr; VAR cmd: SndCommand);
  516. {$ELSEC}
  517.     SndCallBackProcPtr = ProcPtr;
  518. {$ENDC}
  519.  
  520.     SndCallBackUPP = UniversalProcPtr;
  521.     SndChannel = PACKED RECORD
  522.         nextChan:                SndChannelPtr;
  523.         firstMod:                Ptr;                                    {  reserved for the Sound Manager  }
  524.         callBack:                SndCallBackUPP;
  525.         userInfo:                LONGINT;
  526.         wait:                    LONGINT;                                {  The following is for internal Sound Manager use only. }
  527.         cmdInProgress:            SndCommand;
  528.         flags:                    INTEGER;
  529.         qLength:                INTEGER;
  530.         qHead:                    INTEGER;
  531.         qTail:                    INTEGER;
  532.         queue:                    ARRAY [0..127] OF SndCommand;
  533.     END;
  534.  
  535. {MACE structures}
  536.     StateBlockPtr = ^StateBlock;
  537.     StateBlock = RECORD
  538.         stateVar:                ARRAY [0..63] OF INTEGER;
  539.     END;
  540.  
  541.     LeftOverBlockPtr = ^LeftOverBlock;
  542.     LeftOverBlock = RECORD
  543.         count:                    UInt32;
  544.         sampleArea:                ARRAY [0..31] OF SInt8;
  545.     END;
  546.  
  547.     ModRefPtr = ^ModRef;
  548.     ModRef = RECORD
  549.         modNumber:                UInt16;
  550.         modInit:                LONGINT;
  551.     END;
  552.  
  553.     SndListResourcePtr = ^SndListResource;
  554.     SndListResource = RECORD
  555.         format:                    INTEGER;
  556.         numModifiers:            INTEGER;
  557.         modifierPart:            ARRAY [0..0] OF ModRef;
  558.         numCommands:            INTEGER;
  559.         commandPart:            ARRAY [0..0] OF SndCommand;
  560.         dataPart:                SInt8;
  561.     END;
  562.  
  563.     SndListPtr                            = ^SndListResource;
  564.     SndListHandle                        = ^SndListPtr;
  565.     SndListHndl                            = SndListHandle;
  566. {HyperCard sound resource format}
  567.     Snd2ListResourcePtr = ^Snd2ListResource;
  568.     Snd2ListResource = RECORD
  569.         format:                    INTEGER;
  570.         refCount:                INTEGER;
  571.         numCommands:            INTEGER;
  572.         commandPart:            ARRAY [0..0] OF SndCommand;
  573.         dataPart:                SInt8;
  574.     END;
  575.  
  576.     Snd2ListPtr                            = ^Snd2ListResource;
  577.     Snd2ListHandle                        = ^Snd2ListPtr;
  578.     Snd2ListHndl                        = Snd2ListHandle;
  579.     SoundHeaderPtr = ^SoundHeader;
  580.     SoundHeader = PACKED RECORD
  581.         samplePtr:                Ptr;                                    { if NIL then samples are in sampleArea }
  582.         length:                    UInt32;                                    { length of sound in bytes }
  583.         sampleRate:                UnsignedFixed;                            { sample rate for this sound }
  584.         loopStart:                UInt32;                                    { start of looping portion }
  585.         loopEnd:                UInt32;                                    { end of looping portion }
  586.         encode:                    UInt8;                                    { header encoding }
  587.         baseFrequency:            UInt8;                                    { baseFrequency value }
  588.         sampleArea:                PACKED ARRAY [0..0] OF UInt8;            { space for when samples follow directly }
  589.     END;
  590.  
  591.     CmpSoundHeaderPtr = ^CmpSoundHeader;
  592.     CmpSoundHeader = PACKED RECORD
  593.         samplePtr:                Ptr;                                    { if nil then samples are in sample area }
  594.         numChannels:            UInt32;                                    { number of channels i.e. mono = 1 }
  595.         sampleRate:                UnsignedFixed;                            { sample rate in Apples Fixed point representation }
  596.         loopStart:                UInt32;                                    { loopStart of sound before compression }
  597.         loopEnd:                UInt32;                                    { loopEnd of sound before compression }
  598.         encode:                    UInt8;                                    { data structure used , stdSH, extSH, or cmpSH }
  599.         baseFrequency:            UInt8;                                    { same meaning as regular SoundHeader }
  600.         numFrames:                UInt32;                                    { length in frames ( packetFrames or sampleFrames ) }
  601.         AIFFSampleRate:            extended80;                                { IEEE sample rate }
  602.         markerChunk:            Ptr;                                    { sync track }
  603.         format:                    OSType;                                    { data format type, was futureUse1 }
  604.         futureUse2:                UInt32;                                    { reserved by Apple }
  605.         stateVars:                StateBlockPtr;                            { pointer to State Block }
  606.         leftOverSamples:        LeftOverBlockPtr;                        { used to save truncated samples between compression calls }
  607.         compressionID:            INTEGER;                                { 0 means no compression, non zero means compressionID }
  608.         packetSize:                UInt16;                                    { number of bits in compressed sample packet }
  609.         snthID:                    UInt16;                                    { resource ID of Sound Manager snth that contains NRT C/E }
  610.         sampleSize:                UInt16;                                    { number of bits in non-compressed sample }
  611.         sampleArea:                PACKED ARRAY [0..0] OF UInt8;            { space for when samples follow directly }
  612.     END;
  613.  
  614.     ExtSoundHeaderPtr = ^ExtSoundHeader;
  615.     ExtSoundHeader = PACKED RECORD
  616.         samplePtr:                Ptr;                                    { if nil then samples are in sample area }
  617.         numChannels:            UInt32;                                    { number of channels,  ie mono = 1 }
  618.         sampleRate:                UnsignedFixed;                            { sample rate in Apples Fixed point representation }
  619.         loopStart:                UInt32;                                    { same meaning as regular SoundHeader }
  620.         loopEnd:                UInt32;                                    { same meaning as regular SoundHeader }
  621.         encode:                    UInt8;                                    { data structure used , stdSH, extSH, or cmpSH }
  622.         baseFrequency:            UInt8;                                    { same meaning as regular SoundHeader }
  623.         numFrames:                UInt32;                                    { length in total number of frames }
  624.         AIFFSampleRate:            extended80;                                { IEEE sample rate }
  625.         markerChunk:            Ptr;                                    { sync track }
  626.         instrumentChunks:        Ptr;                                    { AIFF instrument chunks }
  627.         AESRecording:            Ptr;
  628.         sampleSize:                UInt16;                                    { number of bits in sample }
  629.         futureUse1:                UInt16;                                    { reserved by Apple }
  630.         futureUse2:                UInt32;                                    { reserved by Apple }
  631.         futureUse3:                UInt32;                                    { reserved by Apple }
  632.         futureUse4:                UInt32;                                    { reserved by Apple }
  633.         sampleArea:                PACKED ARRAY [0..0] OF UInt8;            { space for when samples follow directly }
  634.     END;
  635.  
  636.     SoundHeaderUnionPtr = ^SoundHeaderUnion;
  637.     SoundHeaderUnion = RECORD
  638.         CASE INTEGER OF
  639.         0: (
  640.             stdHeader:            SoundHeader;
  641.             );
  642.         1: (
  643.             cmpHeader:            CmpSoundHeader;
  644.             );
  645.         2: (
  646.             extHeader:            ExtSoundHeader;
  647.             );
  648.     END;
  649.  
  650.     ConversionBlockPtr = ^ConversionBlock;
  651.     ConversionBlock = RECORD
  652.         destination:            INTEGER;
  653.         unused:                    INTEGER;
  654.         inputPtr:                CmpSoundHeaderPtr;
  655.         outputPtr:                CmpSoundHeaderPtr;
  656.     END;
  657.  
  658. {  ScheduledSoundHeader flags }
  659.  
  660. CONST
  661.     kScheduledSoundDoScheduled    = $01;
  662.     kScheduledSoundDoCallBack    = $02;
  663.  
  664.  
  665. TYPE
  666.     ScheduledSoundHeaderPtr = ^ScheduledSoundHeader;
  667.     ScheduledSoundHeader = RECORD
  668.         u:                        SoundHeaderUnion;
  669.         flags:                    LONGINT;
  670.         reserved:                INTEGER;
  671.         callBackParam1:            INTEGER;
  672.         callBackParam2:            LONGINT;
  673.         startTime:                TimeRecord;
  674.     END;
  675.  
  676.     SMStatusPtr = ^SMStatus;
  677.     SMStatus = PACKED RECORD
  678.         smMaxCPULoad:            INTEGER;
  679.         smNumChannels:            INTEGER;
  680.         smCurCPULoad:            INTEGER;
  681.     END;
  682.  
  683.     SCStatusPtr = ^SCStatus;
  684.     SCStatus = RECORD
  685.         scStartTime:            UnsignedFixed;
  686.         scEndTime:                UnsignedFixed;
  687.         scCurrentTime:            UnsignedFixed;
  688.         scChannelBusy:            BOOLEAN;
  689.         scChannelDisposed:        BOOLEAN;
  690.         scChannelPaused:        BOOLEAN;
  691.         scUnused:                BOOLEAN;
  692.         scChannelAttributes:    UInt32;
  693.         scCPULoad:                LONGINT;
  694.     END;
  695.  
  696.     AudioSelectionPtr = ^AudioSelection;
  697.     AudioSelection = PACKED RECORD
  698.         unitType:                LONGINT;
  699.         selStart:                UnsignedFixed;
  700.         selEnd:                    UnsignedFixed;
  701.     END;
  702.  
  703.     SndDoubleBufferPtr = ^SndDoubleBuffer;
  704.     SndDoubleBuffer = PACKED RECORD
  705.         dbNumFrames:            LONGINT;
  706.         dbFlags:                LONGINT;
  707.         dbUserInfo:                ARRAY [0..1] OF LONGINT;
  708.         dbSoundData:            ARRAY [0..0] OF SInt8;
  709.     END;
  710.  
  711. {$IFC TYPED_FUNCTION_POINTERS}
  712.     SndDoubleBackProcPtr = PROCEDURE(channel: SndChannelPtr; doubleBufferPtr: SndDoubleBufferPtr);
  713. {$ELSEC}
  714.     SndDoubleBackProcPtr = ProcPtr;
  715. {$ENDC}
  716.  
  717.     SndDoubleBackUPP = UniversalProcPtr;
  718.     SndDoubleBufferHeaderPtr = ^SndDoubleBufferHeader;
  719.     SndDoubleBufferHeader = PACKED RECORD
  720.         dbhNumChannels:            INTEGER;
  721.         dbhSampleSize:            INTEGER;
  722.         dbhCompressionID:        INTEGER;
  723.         dbhPacketSize:            INTEGER;
  724.         dbhSampleRate:            UnsignedFixed;
  725.         dbhBufferPtr:            ARRAY [0..1] OF SndDoubleBufferPtr;
  726.         dbhDoubleBack:            SndDoubleBackUPP;
  727.     END;
  728.  
  729.     SndDoubleBufferHeader2Ptr = ^SndDoubleBufferHeader2;
  730.     SndDoubleBufferHeader2 = PACKED RECORD
  731.         dbhNumChannels:            INTEGER;
  732.         dbhSampleSize:            INTEGER;
  733.         dbhCompressionID:        INTEGER;
  734.         dbhPacketSize:            INTEGER;
  735.         dbhSampleRate:            UnsignedFixed;
  736.         dbhBufferPtr:            ARRAY [0..1] OF SndDoubleBufferPtr;
  737.         dbhDoubleBack:            SndDoubleBackUPP;
  738.         dbhFormat:                OSType;
  739.     END;
  740.  
  741.     SoundInfoListPtr = ^SoundInfoList;
  742.     SoundInfoList = PACKED RECORD
  743.         count:                    INTEGER;
  744.         infoHandle:                Handle;
  745.     END;
  746.  
  747.     SoundComponentDataPtr = ^SoundComponentData;
  748.     SoundComponentData = RECORD
  749.         flags:                    LONGINT;
  750.         format:                    OSType;
  751.         numChannels:            INTEGER;
  752.         sampleSize:                INTEGER;
  753.         sampleRate:                UnsignedFixed;
  754.         sampleCount:            LONGINT;
  755.         buffer:                    Ptr;
  756.         reserved:                LONGINT;
  757.     END;
  758.  
  759.     SoundParamBlockPtr = ^SoundParamBlock;
  760. {$IFC TYPED_FUNCTION_POINTERS}
  761.     SoundParamProcPtr = FUNCTION(VAR pb: SoundParamBlockPtr): BOOLEAN;
  762. {$ELSEC}
  763.     SoundParamProcPtr = ProcPtr;
  764. {$ENDC}
  765.  
  766.     SoundParamUPP = UniversalProcPtr;
  767.     SoundParamBlock = RECORD
  768.         recordSize:                LONGINT;                                { size of this record in bytes }
  769.         desc:                    SoundComponentData;                        { description of sound buffer }
  770.         rateMultiplier:            UnsignedFixed;                            { rate multiplier to apply to sound }
  771.         leftVolume:                INTEGER;                                { volumes to apply to sound }
  772.         rightVolume:            INTEGER;
  773.         quality:                LONGINT;                                { quality to apply to sound }
  774.         filter:                    ComponentInstance;                        { filter to apply to sound }
  775.         moreRtn:                SoundParamUPP;                            { routine to call to get more data }
  776.         completionRtn:            SoundParamUPP;                            { routine to call when buffer is complete }
  777.         refCon:                    LONGINT;                                { user refcon }
  778.         result:                    INTEGER;                                { result }
  779.     END;
  780.  
  781.     CompressionInfoPtr = ^CompressionInfo;
  782.     CompressionInfo = RECORD
  783.         recordSize:                LONGINT;
  784.         format:                    OSType;
  785.         compressionID:            INTEGER;
  786.         samplesPerPacket:        UInt16;
  787.         bytesPerPacket:            UInt16;
  788.         bytesPerFrame:            UInt16;
  789.         bytesPerSample:            UInt16;
  790.         futureUse1:                UInt16;
  791.     END;
  792.  
  793.     CompressionInfoHandle                = ^CompressionInfoPtr;
  794. { variables for floating point conversion }
  795.     SoundSlopeAndInterceptRecordPtr = ^SoundSlopeAndInterceptRecord;
  796.     SoundSlopeAndInterceptRecord = RECORD
  797.         slope:                    Float64;
  798.         intercept:                Float64;
  799.         minClip:                Float64;
  800.         maxClip:                Float64;
  801.     END;
  802.  
  803.     SoundSlopeAndInterceptPtr            = ^SoundSlopeAndInterceptRecord;
  804. { private thing to use as a reference to a Sound Converter }
  805.     SoundConverter = ^LONGINT;
  806. { private thing to use as a reference to a Sound Source }
  807.     SoundSource = ^LONGINT;
  808.     SoundSourcePtr                        = ^SoundSource;
  809.     SoundComponentLinkPtr = ^SoundComponentLink;
  810.     SoundComponentLink = RECORD
  811.         description:            ComponentDescription;                    { Describes the sound component }
  812.         mixerID:                SoundSource;                            { Reserved by Apple }
  813.         linkID:                    SoundSourcePtr;                            { Reserved by Apple }
  814.     END;
  815.  
  816.     AudioInfoPtr = ^AudioInfo;
  817.     AudioInfo = RECORD
  818.         capabilitiesFlags:        LONGINT;                                { Describes device capabilities }
  819.         reserved:                LONGINT;                                { Reserved by Apple }
  820.         numVolumeSteps:            UInt16;                                    { Number of significant increments between min and max volume }
  821.     END;
  822.  
  823.     AudioFormatAtomPtr = ^AudioFormatAtom;
  824.     AudioFormatAtom = RECORD
  825.         size:                    LONGINT;                                {  = sizeof(AudioFormatAtom) }
  826.         atomType:                OSType;                                    {  = kAudioFormatAtomType }
  827.         format:                    OSType;
  828.     END;
  829.  
  830.     AudioEndianAtomPtr = ^AudioEndianAtom;
  831.     AudioEndianAtom = RECORD
  832.         size:                    LONGINT;                                {  = sizeof(AudioEndianAtom) }
  833.         atomType:                OSType;                                    {  = kAudioEndianAtomType }
  834.         littleEndian:            INTEGER;
  835.     END;
  836.  
  837.     AudioTerminatorAtomPtr = ^AudioTerminatorAtom;
  838.     AudioTerminatorAtom = RECORD
  839.         size:                    LONGINT;                                {  = sizeof(AudioTerminatorAtom) }
  840.         atomType:                OSType;                                    {  = kAudioTerminatorAtomType }
  841.     END;
  842.  
  843. {  Sound Input Structures }
  844.     SPBPtr = ^SPB;
  845. {user procedures called by sound input routines}
  846. {$IFC TYPED_FUNCTION_POINTERS}
  847.     SIInterruptProcPtr = PROCEDURE(inParamPtr: SPBPtr; dataBuffer: Ptr; peakAmplitude: INTEGER; sampleSize: LONGINT);
  848. {$ELSEC}
  849.     SIInterruptProcPtr = Register68kProcPtr;
  850. {$ENDC}
  851.  
  852. {$IFC TYPED_FUNCTION_POINTERS}
  853.     FilePlayCompletionProcPtr = PROCEDURE(chan: SndChannelPtr);
  854. {$ELSEC}
  855.     FilePlayCompletionProcPtr = ProcPtr;
  856. {$ENDC}
  857.  
  858. {$IFC TYPED_FUNCTION_POINTERS}
  859.     SICompletionProcPtr = PROCEDURE(inParamPtr: SPBPtr);
  860. {$ELSEC}
  861.     SICompletionProcPtr = ProcPtr;
  862. {$ENDC}
  863.  
  864.     SIInterruptUPP = UniversalProcPtr;
  865.     FilePlayCompletionUPP = UniversalProcPtr;
  866.     SICompletionUPP = UniversalProcPtr;
  867. {Sound Input Parameter Block}
  868.     SPB = RECORD
  869.         inRefNum:                LONGINT;                                { reference number of sound input device }
  870.         count:                    UInt32;                                    { number of bytes to record }
  871.         milliseconds:            UInt32;                                    { number of milliseconds to record }
  872.         bufferLength:            UInt32;                                    { length of buffer in bytes }
  873.         bufferPtr:                Ptr;                                    { buffer to store sound data in }
  874.         completionRoutine:        SICompletionUPP;                        { completion routine }
  875.         interruptRoutine:        SIInterruptUPP;                            { interrupt routine }
  876.         userLong:                LONGINT;                                { user-defined field }
  877.         error:                    OSErr;                                    { error }
  878.         unused1:                LONGINT;                                { reserved - must be zero }
  879.     END;
  880.  
  881. {
  882.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  883.    prototypes
  884.   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  885. }
  886.  
  887. {
  888.    These two routines for Get/SetSoundVol should no longer be used.
  889.    They were for old Apple Sound Chip machines, and do not support the DSP or PowerMacs.
  890.    Use Get/SetDefaultOutputVolume instead, if you must change the user's machine.
  891. }
  892.  
  893. {$IFC OLDROUTINENAMES AND TARGET_CPU_68K }
  894. PROCEDURE SetSoundVol(level: INTEGER);
  895.  
  896. PROCEDURE GetSoundVol(VAR level: INTEGER);
  897.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  898.     INLINE $205F, $4218, $10B8, $0260;
  899.     {$ENDC}
  900. {$ENDC}
  901.  
  902. { Sound Manager routines }
  903. PROCEDURE SysBeep(duration: INTEGER);
  904.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  905.     INLINE $A9C8;
  906.     {$ENDC}
  907. FUNCTION SndDoCommand(chan: SndChannelPtr; {CONST}VAR cmd: SndCommand; noWait: BOOLEAN): OSErr;
  908.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  909.     INLINE $A803;
  910.     {$ENDC}
  911. FUNCTION SndDoImmediate(chan: SndChannelPtr; {CONST}VAR cmd: SndCommand): OSErr;
  912.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  913.     INLINE $A804;
  914.     {$ENDC}
  915. FUNCTION SndNewChannel(VAR chan: SndChannelPtr; synth: INTEGER; init: LONGINT; userRoutine: SndCallBackUPP): OSErr;
  916.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  917.     INLINE $A807;
  918.     {$ENDC}
  919. FUNCTION SndDisposeChannel(chan: SndChannelPtr; quietNow: BOOLEAN): OSErr;
  920.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  921.     INLINE $A801;
  922.     {$ENDC}
  923. FUNCTION SndPlay(chan: SndChannelPtr; sndHandle: SndListHandle; async: BOOLEAN): OSErr;
  924.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  925.     INLINE $A805;
  926.     {$ENDC}
  927. {$IFC OLDROUTINENAMES }
  928. FUNCTION SndAddModifier(chan: SndChannelPtr; modifier: Ptr; id: INTEGER; init: LONGINT): OSErr;
  929.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  930.     INLINE $A802;
  931.     {$ENDC}
  932. {$ENDC}  {OLDROUTINENAMES}
  933.  
  934. FUNCTION SndControl(id: INTEGER; VAR cmd: SndCommand): OSErr;
  935.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  936.     INLINE $A806;
  937.     {$ENDC}
  938. { Sound Manager 2.0 and later, uses _SoundDispatch }
  939. FUNCTION SndSoundManagerVersion: NumVersion;
  940.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  941.     INLINE $203C, $000C, $0008, $A800;
  942.     {$ENDC}
  943. FUNCTION SndStartFilePlay(chan: SndChannelPtr; fRefNum: INTEGER; resNum: INTEGER; bufferSize: LONGINT; theBuffer: UNIV Ptr; theSelection: AudioSelectionPtr; theCompletion: FilePlayCompletionUPP; async: BOOLEAN): OSErr;
  944.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  945.     INLINE $203C, $0D00, $0008, $A800;
  946.     {$ENDC}
  947. FUNCTION SndPauseFilePlay(chan: SndChannelPtr): OSErr;
  948.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  949.     INLINE $203C, $0204, $0008, $A800;
  950.     {$ENDC}
  951. FUNCTION SndStopFilePlay(chan: SndChannelPtr; quietNow: BOOLEAN): OSErr;
  952.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  953.     INLINE $203C, $0308, $0008, $A800;
  954.     {$ENDC}
  955. FUNCTION SndChannelStatus(chan: SndChannelPtr; theLength: INTEGER; theStatus: SCStatusPtr): OSErr;
  956.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  957.     INLINE $203C, $0510, $0008, $A800;
  958.     {$ENDC}
  959. FUNCTION SndManagerStatus(theLength: INTEGER; theStatus: SMStatusPtr): OSErr;
  960.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  961.     INLINE $203C, $0314, $0008, $A800;
  962.     {$ENDC}
  963. PROCEDURE SndGetSysBeepState(VAR sysBeepState: INTEGER);
  964.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  965.     INLINE $203C, $0218, $0008, $A800;
  966.     {$ENDC}
  967. FUNCTION SndSetSysBeepState(sysBeepState: INTEGER): OSErr;
  968.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  969.     INLINE $203C, $011C, $0008, $A800;
  970.     {$ENDC}
  971. FUNCTION SndPlayDoubleBuffer(chan: SndChannelPtr; theParams: SndDoubleBufferHeaderPtr): OSErr;
  972.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  973.     INLINE $203C, $0420, $0008, $A800;
  974.     {$ENDC}
  975. { MACE compression routines, uses _SoundDispatch }
  976. FUNCTION MACEVersion: NumVersion;
  977.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  978.     INLINE $203C, $0000, $0010, $A800;
  979.     {$ENDC}
  980. PROCEDURE Comp3to1(inBuffer: UNIV Ptr; outBuffer: UNIV Ptr; cnt: UInt32; inState: StateBlockPtr; outState: StateBlockPtr; numChannels: UInt32; whichChannel: UInt32);
  981.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  982.     INLINE $203C, $0004, $0010, $A800;
  983.     {$ENDC}
  984. PROCEDURE Exp1to3(inBuffer: UNIV Ptr; outBuffer: UNIV Ptr; cnt: UInt32; inState: StateBlockPtr; outState: StateBlockPtr; numChannels: UInt32; whichChannel: UInt32);
  985.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  986.     INLINE $203C, $0008, $0010, $A800;
  987.     {$ENDC}
  988. PROCEDURE Comp6to1(inBuffer: UNIV Ptr; outBuffer: UNIV Ptr; cnt: UInt32; inState: StateBlockPtr; outState: StateBlockPtr; numChannels: UInt32; whichChannel: UInt32);
  989.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  990.     INLINE $203C, $000C, $0010, $A800;
  991.     {$ENDC}
  992. PROCEDURE Exp1to6(inBuffer: UNIV Ptr; outBuffer: UNIV Ptr; cnt: UInt32; inState: StateBlockPtr; outState: StateBlockPtr; numChannels: UInt32; whichChannel: UInt32);
  993.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  994.     INLINE $203C, $0010, $0010, $A800;
  995.     {$ENDC}
  996. { Sound Manager 3.0 and later calls, uses _SoundDispatch }
  997. FUNCTION GetSysBeepVolume(VAR level: LONGINT): OSErr;
  998.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  999.     INLINE $203C, $0224, $0018, $A800;
  1000.     {$ENDC}
  1001. FUNCTION SetSysBeepVolume(level: LONGINT): OSErr;
  1002.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1003.     INLINE $203C, $0228, $0018, $A800;
  1004.     {$ENDC}
  1005. FUNCTION GetDefaultOutputVolume(VAR level: LONGINT): OSErr;
  1006.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1007.     INLINE $203C, $022C, $0018, $A800;
  1008.     {$ENDC}
  1009. FUNCTION SetDefaultOutputVolume(level: LONGINT): OSErr;
  1010.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1011.     INLINE $203C, $0230, $0018, $A800;
  1012.     {$ENDC}
  1013. FUNCTION GetSoundHeaderOffset(sndHandle: SndListHandle; VAR offset: LONGINT): OSErr;
  1014.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1015.     INLINE $203C, $0404, $0018, $A800;
  1016.     {$ENDC}
  1017. FUNCTION UnsignedFixedMulDiv(value: UnsignedFixed; multiplier: UnsignedFixed; divisor: UnsignedFixed): UnsignedFixed;
  1018.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1019.     INLINE $203C, $060C, $0018, $A800;
  1020.     {$ENDC}
  1021. FUNCTION GetCompressionInfo(compressionID: INTEGER; format: OSType; numChannels: INTEGER; sampleSize: INTEGER; cp: CompressionInfoPtr): OSErr;
  1022.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1023.     INLINE $203C, $0710, $0018, $A800;
  1024.     {$ENDC}
  1025. FUNCTION SetSoundPreference(theType: OSType; VAR name: Str255; settings: Handle): OSErr;
  1026.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1027.     INLINE $203C, $0634, $0018, $A800;
  1028.     {$ENDC}
  1029. FUNCTION GetSoundPreference(theType: OSType; VAR name: Str255; settings: Handle): OSErr;
  1030.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1031.     INLINE $203C, $0638, $0018, $A800;
  1032.     {$ENDC}
  1033. FUNCTION OpenMixerSoundComponent(outputDescription: SoundComponentDataPtr; outputFlags: LONGINT; VAR mixerComponent: ComponentInstance): OSErr;
  1034.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1035.     INLINE $203C, $0614, $0018, $A800;
  1036.     {$ENDC}
  1037. FUNCTION CloseMixerSoundComponent(ci: ComponentInstance): OSErr;
  1038.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1039.     INLINE $203C, $0218, $0018, $A800;
  1040.     {$ENDC}
  1041. { Sound Manager 3.1 and later calls, uses _SoundDispatch }
  1042. FUNCTION SndGetInfo(chan: SndChannelPtr; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1043.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1044.     INLINE $203C, $063C, $0018, $A800;
  1045.     {$ENDC}
  1046. FUNCTION SndSetInfo(chan: SndChannelPtr; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1047.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1048.     INLINE $203C, $0640, $0018, $A800;
  1049.     {$ENDC}
  1050. FUNCTION GetSoundOutputInfo(outputDevice: Component; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1051.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1052.     INLINE $203C, $0644, $0018, $A800;
  1053.     {$ENDC}
  1054. FUNCTION SetSoundOutputInfo(outputDevice: Component; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1055.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1056.     INLINE $203C, $0648, $0018, $A800;
  1057.     {$ENDC}
  1058. { Sound Manager 3.2 and later calls, uses _SoundDispatch }
  1059. FUNCTION GetCompressionName(compressionType: OSType; VAR compressionName: Str255): OSErr;
  1060.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1061.     INLINE $203C, $044C, $0018, $A800;
  1062.     {$ENDC}
  1063. FUNCTION SoundConverterOpen({CONST}VAR inputFormat: SoundComponentData; {CONST}VAR outputFormat: SoundComponentData; VAR sc: SoundConverter): OSErr;
  1064.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1065.     INLINE $203C, $0650, $0018, $A800;
  1066.     {$ENDC}
  1067. FUNCTION SoundConverterClose(sc: SoundConverter): OSErr;
  1068.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1069.     INLINE $203C, $0254, $0018, $A800;
  1070.     {$ENDC}
  1071. FUNCTION SoundConverterGetBufferSizes(sc: SoundConverter; inputBytesTarget: UInt32; VAR inputFrames: UInt32; VAR inputBytes: UInt32; VAR outputBytes: UInt32): OSErr;
  1072.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1073.     INLINE $203C, $0A58, $0018, $A800;
  1074.     {$ENDC}
  1075. FUNCTION SoundConverterBeginConversion(sc: SoundConverter): OSErr;
  1076.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1077.     INLINE $203C, $025C, $0018, $A800;
  1078.     {$ENDC}
  1079. FUNCTION SoundConverterConvertBuffer(sc: SoundConverter; inputPtr: UNIV Ptr; inputFrames: UInt32; outputPtr: UNIV Ptr; VAR outputFrames: UInt32; VAR outputBytes: UInt32): OSErr;
  1080.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1081.     INLINE $203C, $0C60, $0018, $A800;
  1082.     {$ENDC}
  1083. FUNCTION SoundConverterEndConversion(sc: SoundConverter; outputPtr: UNIV Ptr; VAR outputFrames: UInt32; VAR outputBytes: UInt32): OSErr;
  1084.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1085.     INLINE $203C, $0864, $0018, $A800;
  1086.     {$ENDC}
  1087. { Sound Manager 3.3 and later calls, uses _SoundDispatch }
  1088. FUNCTION SoundConverterGetInfo(sc: SoundConverter; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1089.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1090.     INLINE $203C, $0668, $0018, $A800;
  1091.     {$ENDC}
  1092. FUNCTION SoundConverterSetInfo(sc: SoundConverter; selector: OSType; infoPtr: UNIV Ptr): OSErr;
  1093.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1094.     INLINE $203C, $066C, $0018, $A800;
  1095.     {$ENDC}
  1096. {
  1097.   Sound Component Functions
  1098.    basic sound component functions
  1099. }
  1100.  
  1101. FUNCTION SoundComponentInitOutputDevice(ti: ComponentInstance; actions: LONGINT): ComponentResult;
  1102.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1103.     INLINE $2F3C, $0004, $0001, $7000, $A82A;
  1104.     {$ENDC}
  1105. FUNCTION SoundComponentSetSource(ti: ComponentInstance; sourceID: SoundSource; source: ComponentInstance): ComponentResult;
  1106.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1107.     INLINE $2F3C, $0008, $0002, $7000, $A82A;
  1108.     {$ENDC}
  1109. FUNCTION SoundComponentGetSource(ti: ComponentInstance; sourceID: SoundSource; VAR source: ComponentInstance): ComponentResult;
  1110.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1111.     INLINE $2F3C, $0008, $0003, $7000, $A82A;
  1112.     {$ENDC}
  1113. FUNCTION SoundComponentGetSourceData(ti: ComponentInstance; VAR sourceData: SoundComponentDataPtr): ComponentResult;
  1114.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1115.     INLINE $2F3C, $0004, $0004, $7000, $A82A;
  1116.     {$ENDC}
  1117. FUNCTION SoundComponentSetOutput(ti: ComponentInstance; requested: SoundComponentDataPtr; VAR actual: SoundComponentDataPtr): ComponentResult;
  1118.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1119.     INLINE $2F3C, $0008, $0005, $7000, $A82A;
  1120.     {$ENDC}
  1121. {  junction methods for the mixer, must be called at non-interrupt level }
  1122. FUNCTION SoundComponentAddSource(ti: ComponentInstance; VAR sourceID: SoundSource): ComponentResult;
  1123.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1124.     INLINE $2F3C, $0004, $0101, $7000, $A82A;
  1125.     {$ENDC}
  1126. FUNCTION SoundComponentRemoveSource(ti: ComponentInstance; sourceID: SoundSource): ComponentResult;
  1127.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1128.     INLINE $2F3C, $0004, $0102, $7000, $A82A;
  1129.     {$ENDC}
  1130. {  info methods }
  1131. FUNCTION SoundComponentGetInfo(ti: ComponentInstance; sourceID: SoundSource; selector: OSType; infoPtr: UNIV Ptr): ComponentResult;
  1132.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1133.     INLINE $2F3C, $000C, $0103, $7000, $A82A;
  1134.     {$ENDC}
  1135. FUNCTION SoundComponentSetInfo(ti: ComponentInstance; sourceID: SoundSource; selector: OSType; infoPtr: UNIV Ptr): ComponentResult;
  1136.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1137.     INLINE $2F3C, $000C, $0104, $7000, $A82A;
  1138.     {$ENDC}
  1139. {  control methods }
  1140. FUNCTION SoundComponentStartSource(ti: ComponentInstance; count: INTEGER; VAR sources: SoundSource): ComponentResult;
  1141.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1142.     INLINE $2F3C, $0006, $0105, $7000, $A82A;
  1143.     {$ENDC}
  1144. FUNCTION SoundComponentStopSource(ti: ComponentInstance; count: INTEGER; VAR sources: SoundSource): ComponentResult;
  1145.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1146.     INLINE $2F3C, $0006, $0106, $7000, $A82A;
  1147.     {$ENDC}
  1148. FUNCTION SoundComponentPauseSource(ti: ComponentInstance; count: INTEGER; VAR sources: SoundSource): ComponentResult;
  1149.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1150.     INLINE $2F3C, $0006, $0107, $7000, $A82A;
  1151.     {$ENDC}
  1152. FUNCTION SoundComponentPlaySourceBuffer(ti: ComponentInstance; sourceID: SoundSource; pb: SoundParamBlockPtr; actions: LONGINT): ComponentResult;
  1153.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1154.     INLINE $2F3C, $000C, $0108, $7000, $A82A;
  1155.     {$ENDC}
  1156. { Audio Components }
  1157. {Volume is described as a value between 0 and 1, with 0 indicating minimum
  1158.   volume and 1 indicating maximum volume; if the device doesn't support
  1159.   software control of volume, then a value of unimpErr is returned, indicating
  1160.   that these functions are not supported by the device}
  1161. FUNCTION AudioGetVolume(ac: ComponentInstance; whichChannel: INTEGER; VAR volume: ShortFixed): ComponentResult;
  1162.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1163.     INLINE $2F3C, $0006, $0000, $7000, $A82A;
  1164.     {$ENDC}
  1165. FUNCTION AudioSetVolume(ac: ComponentInstance; whichChannel: INTEGER; volume: ShortFixed): ComponentResult;
  1166.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1167.     INLINE $2F3C, $0004, $0001, $7000, $A82A;
  1168.     {$ENDC}
  1169. {If the device doesn't support software control of mute, then a value of unimpErr is
  1170. returned, indicating that these functions are not supported by the device.}
  1171. FUNCTION AudioGetMute(ac: ComponentInstance; whichChannel: INTEGER; VAR mute: INTEGER): ComponentResult;
  1172.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1173.     INLINE $2F3C, $0006, $0002, $7000, $A82A;
  1174.     {$ENDC}
  1175. FUNCTION AudioSetMute(ac: ComponentInstance; whichChannel: INTEGER; mute: INTEGER): ComponentResult;
  1176.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1177.     INLINE $2F3C, $0004, $0003, $7000, $A82A;
  1178.     {$ENDC}
  1179. {AudioSetToDefaults causes the associated device to reset its volume and mute values
  1180. (and perhaps other characteristics, e.g. attenuation) to "factory default" settings}
  1181. FUNCTION AudioSetToDefaults(ac: ComponentInstance): ComponentResult;
  1182.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1183.     INLINE $2F3C, $0000, $0004, $7000, $A82A;
  1184.     {$ENDC}
  1185. { This routine is required; it must be implemented by all audio components }
  1186.  
  1187. FUNCTION AudioGetInfo(ac: ComponentInstance; info: AudioInfoPtr): ComponentResult;
  1188.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1189.     INLINE $2F3C, $0004, $0005, $7000, $A82A;
  1190.     {$ENDC}
  1191. FUNCTION AudioGetBass(ac: ComponentInstance; whichChannel: INTEGER; VAR bass: INTEGER): ComponentResult;
  1192.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1193.     INLINE $2F3C, $0006, $0006, $7000, $A82A;
  1194.     {$ENDC}
  1195. FUNCTION AudioSetBass(ac: ComponentInstance; whichChannel: INTEGER; bass: INTEGER): ComponentResult;
  1196.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1197.     INLINE $2F3C, $0004, $0007, $7000, $A82A;
  1198.     {$ENDC}
  1199. FUNCTION AudioGetTreble(ac: ComponentInstance; whichChannel: INTEGER; VAR Treble: INTEGER): ComponentResult;
  1200.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1201.     INLINE $2F3C, $0006, $0008, $7000, $A82A;
  1202.     {$ENDC}
  1203. FUNCTION AudioSetTreble(ac: ComponentInstance; whichChannel: INTEGER; Treble: INTEGER): ComponentResult;
  1204.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1205.     INLINE $2F3C, $0004, $0009, $7000, $A82A;
  1206.     {$ENDC}
  1207. FUNCTION AudioGetOutputDevice(ac: ComponentInstance; VAR outputDevice: Component): ComponentResult;
  1208.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1209.     INLINE $2F3C, $0004, $000A, $7000, $A82A;
  1210.     {$ENDC}
  1211.  
  1212. { This is routine is private to the AudioVision component.  It enables the watching of the mute key. }
  1213. FUNCTION AudioMuteOnEvent(ac: ComponentInstance; muteOnEvent: INTEGER): ComponentResult;
  1214.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1215.     INLINE $2F3C, $0002, $0081, $7000, $A82A;
  1216.     {$ENDC}
  1217.  
  1218. CONST
  1219.     kDelegatedSoundComponentSelectors = $0100;
  1220.  
  1221. { Sound Input Manager routines, uses _SoundDispatch }
  1222. FUNCTION SPBVersion: NumVersion;
  1223.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1224.     INLINE $203C, $0000, $0014, $A800;
  1225.     {$ENDC}
  1226. FUNCTION SndRecord(filterProc: ModalFilterUPP; corner: Point; quality: OSType; VAR sndHandle: SndListHandle): OSErr;
  1227.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1228.     INLINE $203C, $0804, $0014, $A800;
  1229.     {$ENDC}
  1230. FUNCTION SndRecordToFile(filterProc: ModalFilterUPP; corner: Point; quality: OSType; fRefNum: INTEGER): OSErr;
  1231.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1232.     INLINE $203C, $0708, $0014, $A800;
  1233.     {$ENDC}
  1234. FUNCTION SPBSignInDevice(deviceRefNum: INTEGER; deviceName: Str255): OSErr;
  1235.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1236.     INLINE $203C, $030C, $0014, $A800;
  1237.     {$ENDC}
  1238. FUNCTION SPBSignOutDevice(deviceRefNum: INTEGER): OSErr;
  1239.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1240.     INLINE $203C, $0110, $0014, $A800;
  1241.     {$ENDC}
  1242. FUNCTION SPBGetIndexedDevice(count: INTEGER; VAR deviceName: Str255; VAR deviceIconHandle: Handle): OSErr;
  1243.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1244.     INLINE $203C, $0514, $0014, $A800;
  1245.     {$ENDC}
  1246. FUNCTION SPBOpenDevice(deviceName: Str255; permission: INTEGER; VAR inRefNum: LONGINT): OSErr;
  1247.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1248.     INLINE $203C, $0518, $0014, $A800;
  1249.     {$ENDC}
  1250. FUNCTION SPBCloseDevice(inRefNum: LONGINT): OSErr;
  1251.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1252.     INLINE $203C, $021C, $0014, $A800;
  1253.     {$ENDC}
  1254. FUNCTION SPBRecord(inParamPtr: SPBPtr; asynchFlag: BOOLEAN): OSErr;
  1255.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1256.     INLINE $203C, $0320, $0014, $A800;
  1257.     {$ENDC}
  1258. FUNCTION SPBRecordToFile(fRefNum: INTEGER; inParamPtr: SPBPtr; asynchFlag: BOOLEAN): OSErr;
  1259.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1260.     INLINE $203C, $0424, $0014, $A800;
  1261.     {$ENDC}
  1262. FUNCTION SPBPauseRecording(inRefNum: LONGINT): OSErr;
  1263.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1264.     INLINE $203C, $0228, $0014, $A800;
  1265.     {$ENDC}
  1266. FUNCTION SPBResumeRecording(inRefNum: LONGINT): OSErr;
  1267.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1268.     INLINE $203C, $022C, $0014, $A800;
  1269.     {$ENDC}
  1270. FUNCTION SPBStopRecording(inRefNum: LONGINT): OSErr;
  1271.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1272.     INLINE $203C, $0230, $0014, $A800;
  1273.     {$ENDC}
  1274. FUNCTION SPBGetRecordingStatus(inRefNum: LONGINT; VAR recordingStatus: INTEGER; VAR meterLevel: INTEGER; VAR totalSamplesToRecord: UInt32; VAR numberOfSamplesRecorded: UInt32; VAR totalMsecsToRecord: UInt32; VAR numberOfMsecsRecorded: UInt32): OSErr;
  1275.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1276.     INLINE $203C, $0E34, $0014, $A800;
  1277.     {$ENDC}
  1278. FUNCTION SPBGetDeviceInfo(inRefNum: LONGINT; infoType: OSType; infoData: UNIV Ptr): OSErr;
  1279.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1280.     INLINE $203C, $0638, $0014, $A800;
  1281.     {$ENDC}
  1282. FUNCTION SPBSetDeviceInfo(inRefNum: LONGINT; infoType: OSType; infoData: UNIV Ptr): OSErr;
  1283.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1284.     INLINE $203C, $063C, $0014, $A800;
  1285.     {$ENDC}
  1286. FUNCTION SPBMillisecondsToBytes(inRefNum: LONGINT; VAR milliseconds: LONGINT): OSErr;
  1287.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1288.     INLINE $203C, $0440, $0014, $A800;
  1289.     {$ENDC}
  1290. FUNCTION SPBBytesToMilliseconds(inRefNum: LONGINT; VAR byteCount: LONGINT): OSErr;
  1291.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1292.     INLINE $203C, $0444, $0014, $A800;
  1293.     {$ENDC}
  1294. FUNCTION SetupSndHeader(sndHandle: SndListHandle; numChannels: INTEGER; sampleRate: UnsignedFixed; sampleSize: INTEGER; compressionType: OSType; baseNote: INTEGER; numBytes: UInt32; VAR headerLen: INTEGER): OSErr;
  1295.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1296.     INLINE $203C, $0D48, $0014, $A800;
  1297.     {$ENDC}
  1298. FUNCTION SetupAIFFHeader(fRefNum: INTEGER; numChannels: INTEGER; sampleRate: UnsignedFixed; sampleSize: INTEGER; compressionType: OSType; numBytes: UInt32; numFrames: UInt32): OSErr;
  1299.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1300.     INLINE $203C, $0B4C, $0014, $A800;
  1301.     {$ENDC}
  1302. { Sound Input Manager 1.1 and later calls, uses _SoundDispatch }
  1303. FUNCTION ParseAIFFHeader(fRefNum: INTEGER; VAR sndInfo: SoundComponentData; VAR numFrames: UInt32; VAR dataOffset: UInt32): OSErr;
  1304.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1305.     INLINE $203C, $0758, $0014, $A800;
  1306.     {$ENDC}
  1307. FUNCTION ParseSndHeader(sndHandle: SndListHandle; VAR sndInfo: SoundComponentData; VAR numFrames: UInt32; VAR dataOffset: UInt32): OSErr;
  1308.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1309.     INLINE $203C, $085C, $0014, $A800;
  1310.     {$ENDC}
  1311.  
  1312. CONST
  1313.     uppSndCallBackProcInfo = $000003C0;
  1314.     uppSndDoubleBackProcInfo = $000003C0;
  1315.     uppSoundParamProcInfo = $000000D0;
  1316.     uppSIInterruptProcInfo = $1C579802;
  1317.     uppFilePlayCompletionProcInfo = $000000C0;
  1318.     uppSICompletionProcInfo = $000000C0;
  1319.  
  1320. FUNCTION NewSndCallBackProc(userRoutine: SndCallBackProcPtr): SndCallBackUPP;
  1321.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1322.     INLINE $2E9F;
  1323.     {$ENDC}
  1324.  
  1325. FUNCTION NewSndDoubleBackProc(userRoutine: SndDoubleBackProcPtr): SndDoubleBackUPP;
  1326.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1327.     INLINE $2E9F;
  1328.     {$ENDC}
  1329.  
  1330. FUNCTION NewSoundParamProc(userRoutine: SoundParamProcPtr): SoundParamUPP;
  1331.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1332.     INLINE $2E9F;
  1333.     {$ENDC}
  1334.  
  1335. FUNCTION NewSIInterruptProc(userRoutine: SIInterruptProcPtr): SIInterruptUPP;
  1336.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1337.     INLINE $2E9F;
  1338.     {$ENDC}
  1339.  
  1340. FUNCTION NewFilePlayCompletionProc(userRoutine: FilePlayCompletionProcPtr): FilePlayCompletionUPP;
  1341.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1342.     INLINE $2E9F;
  1343.     {$ENDC}
  1344.  
  1345. FUNCTION NewSICompletionProc(userRoutine: SICompletionProcPtr): SICompletionUPP;
  1346.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1347.     INLINE $2E9F;
  1348.     {$ENDC}
  1349.  
  1350. PROCEDURE CallSndCallBackProc(chan: SndChannelPtr; VAR cmd: SndCommand; userRoutine: SndCallBackUPP);
  1351.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1352.     INLINE $205F, $4E90;
  1353.     {$ENDC}
  1354.  
  1355. PROCEDURE CallSndDoubleBackProc(channel: SndChannelPtr; doubleBufferPtr: SndDoubleBufferPtr; userRoutine: SndDoubleBackUPP);
  1356.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1357.     INLINE $205F, $4E90;
  1358.     {$ENDC}
  1359.  
  1360. FUNCTION CallSoundParamProc(VAR pb: SoundParamBlockPtr; userRoutine: SoundParamUPP): BOOLEAN;
  1361.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1362.     INLINE $205F, $4E90;
  1363.     {$ENDC}
  1364.  
  1365. PROCEDURE CallSIInterruptProc(inParamPtr: SPBPtr; dataBuffer: Ptr; peakAmplitude: INTEGER; sampleSize: LONGINT; userRoutine: SIInterruptUPP);
  1366.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1367.     {To be implemented:  Glue to move parameters into registers.}
  1368.     {$ENDC}
  1369.  
  1370. PROCEDURE CallFilePlayCompletionProc(chan: SndChannelPtr; userRoutine: FilePlayCompletionUPP);
  1371.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1372.     INLINE $205F, $4E90;
  1373.     {$ENDC}
  1374.  
  1375. PROCEDURE CallSICompletionProc(inParamPtr: SPBPtr; userRoutine: SICompletionUPP);
  1376.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1377.     INLINE $205F, $4E90;
  1378.     {$ENDC}
  1379. {$IFC NOT TARGET_OS_MAC }
  1380. {  Only to be used if you are writing a sound input component; this }
  1381. {  is the param block for a read request from the SoundMgr to the   }
  1382. {  sound input component.  Not to be confused with the SPB struct   }
  1383. {  above, which is the param block for a read request from an app   }
  1384. {  to the SoundMgr.                                                 }
  1385.  
  1386. TYPE
  1387.     SndInputCmpParamPtr = ^SndInputCmpParam;
  1388. {$IFC TYPED_FUNCTION_POINTERS}
  1389.     SICCompletionProcPtr = PROCEDURE(SICParmPtr: SndInputCmpParamPtr);
  1390. {$ELSEC}
  1391.     SICCompletionProcPtr = ProcPtr;
  1392. {$ENDC}
  1393.  
  1394.     SndInputCmpParam = RECORD
  1395.         ioCompletion:            SICCompletionProcPtr;                    {  completion routine [pointer] }
  1396.         ioInterrupt:            SIInterruptProcPtr;                        {  interrupt routine [pointer] }
  1397.         ioResult:                OSErr;                                    {  I/O result code [word] }
  1398.         pad:                    INTEGER;
  1399.         ioReqCount:                UInt32;
  1400.         ioActCount:                UInt32;
  1401.         ioBuffer:                Ptr;
  1402.         ioMisc:                    Ptr;
  1403.     END;
  1404.  
  1405. FUNCTION SndInputReadAsync(self: ComponentInstance; SICParmPtr: SndInputCmpParamPtr): ComponentResult;
  1406.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1407.     INLINE $2F3C, $0004, $0001, $7000, $A82A;
  1408.     {$ENDC}
  1409. FUNCTION SndInputReadSync(self: ComponentInstance; SICParmPtr: SndInputCmpParamPtr): ComponentResult;
  1410.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1411.     INLINE $2F3C, $0004, $0002, $7000, $A82A;
  1412.     {$ENDC}
  1413. FUNCTION SndInputPauseRecording(self: ComponentInstance): ComponentResult;
  1414.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1415.     INLINE $2F3C, $0000, $0003, $7000, $A82A;
  1416.     {$ENDC}
  1417. FUNCTION SndInputResumeRecording(self: ComponentInstance): ComponentResult;
  1418.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1419.     INLINE $2F3C, $0000, $0004, $7000, $A82A;
  1420.     {$ENDC}
  1421. FUNCTION SndInputStopRecording(self: ComponentInstance): ComponentResult;
  1422.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1423.     INLINE $2F3C, $0000, $0005, $7000, $A82A;
  1424.     {$ENDC}
  1425. FUNCTION SndInputGetStatus(self: ComponentInstance; VAR recordingStatus: INTEGER; VAR totalSamplesToRecord: UInt32; VAR numberOfSamplesRecorded: UInt32): ComponentResult;
  1426.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1427.     INLINE $2F3C, $000C, $0006, $7000, $A82A;
  1428.     {$ENDC}
  1429. FUNCTION SndInputGetDeviceInfo(self: ComponentInstance; infoType: OSType; infoData: UNIV Ptr): ComponentResult;
  1430.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1431.     INLINE $2F3C, $0008, $0007, $7000, $A82A;
  1432.     {$ENDC}
  1433. FUNCTION SndInputSetDeviceInfo(self: ComponentInstance; infoType: OSType; infoData: UNIV Ptr): ComponentResult;
  1434.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1435.     INLINE $2F3C, $0008, $0008, $7000, $A82A;
  1436.     {$ENDC}
  1437. FUNCTION SndInputInitHardware(self: ComponentInstance): ComponentResult;
  1438.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1439.     INLINE $2F3C, $0000, $0009, $7000, $A82A;
  1440.     {$ENDC}
  1441.  
  1442. CONST
  1443.     uppSICCompletionProcInfo = $000000C0;
  1444.  
  1445. FUNCTION NewSICCompletionProc(userRoutine: SICCompletionProcPtr): SICCompletionUPP;
  1446.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1447.     INLINE $2E9F;
  1448.     {$ENDC}
  1449.  
  1450. PROCEDURE CallSICCompletionProc(SICParmPtr: SndInputCmpParamPtr; userRoutine: SICCompletionUPP);
  1451.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  1452.     INLINE $205F, $4E90;
  1453.     {$ENDC}
  1454. {$ENDC}
  1455.  
  1456.  
  1457. {$ALIGN RESET}
  1458. {$POP}
  1459.  
  1460. {$SETC UsingIncludes := SoundIncludes}
  1461.  
  1462. {$ENDC} {__SOUND__}
  1463.  
  1464. {$IFC NOT UsingIncludes}
  1465.  END.
  1466. {$ENDC}
  1467.